inherited FMovEntrada: TFMovEntrada
  Left = 541
  Top = 231
  Height = 606
  Caption = 'Movimenta'#231#227'o de Entrada'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnl1: TPanel
    Height = 105
    inherited pnl7: TPanel
      Height = 0
    end
  end
  inherited pnl2: TPanel
    Top = 105
    Height = 463
    object lbl1: TLabel [5]
      Left = 416
      Top = 160
      Width = 95
      Height = 13
      Caption = 'ENTOBSERVACAO'
      FocusControl = dbmmoENTOBSERVACAO
    end
    object lbl3: TLabel [6]
      Left = 8
      Top = 160
      Width = 85
      Height = 13
      Caption = 'ENTDTEMISSAO'
      FocusControl = dbedtENTDTEMISSAO
    end
    object lbl4: TLabel [7]
      Left = 149
      Top = 160
      Width = 115
      Height = 13
      Caption = 'ENTDTRECEBIMENTO'
      FocusControl = dbedtENTDTRECEBIMENTO
    end
    object lbl6: TLabel [8]
      Left = 280
      Top = 56
      Width = 92
      Height = 13
      Caption = 'ENTDOCUMENTO'
      FocusControl = dbedtENTDOCUMENTO
    end
    object lbl7: TLabel [9]
      Left = 416
      Top = 112
      Width = 63
      Height = 13
      Caption = 'PESCODIGO'
      FocusControl = dbedtPESCODIGO
    end
    object lbl8: TLabel [10]
      Left = 8
      Top = 112
      Width = 72
      Height = 13
      Caption = 'EMPREENDID'
      FocusControl = dbedtEMPREENDID
    end
    object lbl9: TLabel [11]
      Left = 8
      Top = 56
      Width = 63
      Height = 13
      Caption = 'ENTRADAID'
      FocusControl = dbedtENTRADAID
    end
    object lbl10: TLabel [12]
      Left = 304
      Top = 160
      Width = 89
      Height = 13
      Caption = 'ENTDTENTRADA'
      FocusControl = dbedtENTDTENTRADA
    end
    object lbl5: TLabel [13]
      Left = 149
      Top = 202
      Width = 95
      Height = 13
      Caption = 'ENTVLDESCONTO'
      FocusControl = dbedtENTVLDESCONTO
    end
    object lbl2: TLabel [14]
      Left = 8
      Top = 200
      Width = 78
      Height = 13
      Caption = 'ENTVLRTOTAL'
      FocusControl = dbedt1
    end
    inherited BtNovo: TBitBtn
      TabOrder = 6
    end
    inherited BtGravar: TBitBtn
      TabOrder = 7
    end
    inherited BtCancelar: TBitBtn
      TabOrder = 8
    end
    inherited BtExcluir: TBitBtn
      TabOrder = 9
    end
    inherited pnl15: TPanel
      TabOrder = 10
    end
    object dbmmoENTOBSERVACAO: TDBMemo
      Left = 416
      Top = 176
      Width = 505
      Height = 57
      DataField = 'ENTOBSERVACAO'
      DataSource = dsPadrao
      TabOrder = 5
    end
    object dbedtENTDTEMISSAO: TDBEdit
      Left = 8
      Top = 176
      Width = 97
      Height = 21
      DataField = 'ENTDTEMISSAO'
      DataSource = dsPadrao
      TabOrder = 3
    end
    object dbedtENTDTRECEBIMENTO: TDBEdit
      Left = 149
      Top = 176
      Width = 97
      Height = 21
      DataField = 'ENTDTRECEBIMENTO'
      DataSource = dsPadrao
      TabOrder = 4
    end
    object dbedtENTDOCUMENTO: TDBEdit
      Left = 280
      Top = 72
      Width = 110
      Height = 21
      DataField = 'ENTDOCUMENTO'
      DataSource = dsPadrao
      TabOrder = 0
    end
    object dbedtPESCODIGO: TDBEdit
      Left = 416
      Top = 128
      Width = 65
      Height = 21
      Color = clMoneyGreen
      DataField = 'PESCODIGO'
      DataSource = dsPadrao
      TabOrder = 2
      OnExit = dbedtPESCODIGOExit
    end
    object dbedtEMPREENDID: TDBEdit
      Left = 8
      Top = 128
      Width = 81
      Height = 21
      Color = clMoneyGreen
      DataField = 'EMPREENDID'
      DataSource = dsPadrao
      TabOrder = 1
      OnDblClick = dbedtEMPREENDIDDblClick
      OnExit = dbedtEMPREENDIDExit
    end
    object EdDescEmpreendimento: TEdit
      Left = 88
      Top = 128
      Width = 313
      Height = 21
      ReadOnly = True
      TabOrder = 11
    end
    object PStatus: TPanel
      Left = 416
      Top = 64
      Width = 489
      Height = 41
      Caption = '...'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 12
      OnDblClick = PStatusDblClick
    end
    object EdPesDescricao: TEdit
      Left = 483
      Top = 128
      Width = 437
      Height = 21
      ReadOnly = True
      TabOrder = 13
    end
    object dbgrd1: TDBGrid
      Left = 8
      Top = 266
      Width = 913
      Height = 193
      DataSource = dsENTRADAITEM
      TabOrder = 14
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = dbgrd1DblClick
      OnKeyDown = dbgrd1KeyDown
      Columns = <
        item
          Expanded = False
          FieldName = 'ENTITE_ITEM'
          Title.Caption = 'Item'
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'IDINSUMO'
          Title.Caption = 'C'#243'd. Insumo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ENTITE_DESCRICAO'
          Title.Caption = 'Descri'#231#227'o'
          Width = 350
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'TIPOINSUMO'
          Title.Caption = 'Tipo'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ENTITE_VALORUNITARIO'
          Title.Caption = 'Vlt. Unitario (A)'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ENTITE_QUANTIDADE'
          Title.Caption = 'Quantidade (B)'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ENTITE_VALORTOTAL'
          Title.Caption = 'Total (AxB)'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ENTRADAID'
          Visible = False
        end>
    end
    object Panel1: TPanel
      Left = 8
      Top = 246
      Width = 913
      Height = 17
      Anchors = [akLeft, akTop, akRight]
      Caption = 'Materiais'
      Color = clActiveCaption
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 15
    end
    object dbedtENTRADAID: TDBEdit
      Left = 8
      Top = 72
      Width = 105
      Height = 21
      DataField = 'ENTRADAID'
      DataSource = dsPadrao
      ReadOnly = True
      TabOrder = 16
    end
    object dbedtENTDTENTRADA: TDBEdit
      Left = 304
      Top = 176
      Width = 97
      Height = 21
      DataField = 'ENTDTENTRADA'
      DataSource = dsPadrao
      ReadOnly = True
      TabOrder = 17
    end
    object dbrgrpENTTIPODOCUMENTO: TDBRadioGroup
      Left = 128
      Top = 54
      Width = 137
      Height = 54
      Caption = 'Tipo de documento'
      DataField = 'ENTTIPODOCUMENTO'
      DataSource = dsPadrao
      Items.Strings = (
        'NOTA'
        'CUPOM')
      TabOrder = 18
      Values.Strings = (
        'NOTA'
        'CUPOM')
    end
    object dbedtENTVLDESCONTO: TDBEdit
      Left = 149
      Top = 218
      Width = 134
      Height = 21
      DataField = 'ENTVLDESCONTO'
      DataSource = dsPadrao
      TabOrder = 19
    end
    object dbedt1: TDBEdit
      Left = 8
      Top = 216
      Width = 134
      Height = 21
      DataField = 'ENTVLRTOTAL'
      DataSource = dsPadrao
      ReadOnly = True
      TabOrder = 20
    end
  end
  inherited qPadrao: TQuery
    AfterInsert = qPadraoAfterInsert
    AfterScroll = qPadraoAfterScroll
    SQL.Strings = (
      'SELECT * FROM ENTRADA'
      'WHERE 1 = -1')
    object mfldPadraoENTOBSERVACAO: TMemoField
      FieldName = 'ENTOBSERVACAO'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTOBSERVACAO'
      BlobType = ftMemo
      Size = 2000
    end
    object dtmfldPadraoENTDTEMISSAO: TDateTimeField
      FieldName = 'ENTDTEMISSAO'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTDTEMISSAO'
      EditMask = '!00/00/0000;1;_'
    end
    object dtmfldPadraoENTDTRECEBIMENTO: TDateTimeField
      FieldName = 'ENTDTRECEBIMENTO'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTDTRECEBIMENTO'
      EditMask = '!00/00/0000;1;_'
    end
    object intgrfldPadraoENTDOCUMENTO: TIntegerField
      FieldName = 'ENTDOCUMENTO'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTDOCUMENTO'
    end
    object intgrfldPadraoPESCODIGO: TIntegerField
      FieldName = 'PESCODIGO'
      Origin = '"BDSISTEMA.FDB".ENTRADA.PESCODIGO'
    end
    object strngfldPadraoENTTPSTATUS: TStringField
      FieldName = 'ENTTPSTATUS'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTTPSTATUS'
      Size = 25
    end
    object intgrfldPadraoEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".ENTRADA.EMPREENDID'
    end
    object intgrfldPadraoENTRADAID: TIntegerField
      FieldName = 'ENTRADAID'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTRADAID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object dtmfldPadraoENTDTENTRADA: TDateTimeField
      FieldName = 'ENTDTENTRADA'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTDTENTRADA'
      EditMask = '!00/00/0000;1;_'
    end
    object strngfldPadraoENTTIPODOCUMENTO: TStringField
      FieldName = 'ENTTIPODOCUMENTO'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTTIPODOCUMENTO'
      Size = 5
    end
    object fltfldPadraoENTVLDESCONTO: TFloatField
      FieldName = 'ENTVLDESCONTO'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTVLDESCONTO'
      currency = True
    end
    object fltfldPadraoENTVLRTOTAL: TFloatField
      FieldName = 'ENTVLRTOTAL'
      Origin = '"BDSISTEMA.FDB".ENTRADA.ENTVLRTOTAL'
      currency = True
    end
  end
  object dsENTRADAITEM: TDataSource
    DataSet = QENTRADAITEM
    Left = 296
    Top = 353
  end
  object QENTRADAITEM: TQuery
    DatabaseName = 'BDSistema.FDB'
    SQL.Strings = (
      'SELECT *  FROM ENTRADA_ITEM'
      'WHERE 1=-1')
    Left = 328
    Top = 353
    object fltfldQENTRADAITEMENTITE_VALORUNITARIO: TFloatField
      FieldName = 'ENTITE_VALORUNITARIO'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.ENTITE_VALORUNITARIO'
      currency = True
    end
    object fltfldQENTRADAITEMENTITE_QUANTIDADE: TFloatField
      FieldName = 'ENTITE_QUANTIDADE'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.ENTITE_QUANTIDADE'
    end
    object intgrfldQENTRADAITEMIDINSUMO: TIntegerField
      FieldName = 'IDINSUMO'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.IDINSUMO'
    end
    object intgrfldQENTRADAITEMENTITE_ITEM: TIntegerField
      FieldName = 'ENTITE_ITEM'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.ENTITE_ITEM'
    end
    object QENTRADAITEMTIPOINSUMO: TStringField
      FieldName = 'TIPOINSUMO'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.TIPOINSUMO'
      Size = 10
    end
    object intgrfldQENTRADAITEMENTRADAID: TIntegerField
      FieldName = 'ENTRADAID'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.ENTRADAID'
    end
    object QENTRADAITEMENTITE_DESCRICAO: TStringField
      FieldName = 'ENTITE_DESCRICAO'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.ENTITE_DESCRICAO'
      Size = 100
    end
    object fltfldQENTRADAITEMENTITE_VALORTOTAL: TFloatField
      FieldName = 'ENTITE_VALORTOTAL'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.ENTITE_VALORTOTAL'
      currency = True
    end
    object intgrfldQENTRADAITEMEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".ENTRADA_ITEM.EMPREENDID'
    end
  end
end
